﻿nil subclass: #Object
!Object methods!
asRemote
	^@AjTalk.Hosting.RemoteObject new: self
! !

Object subclass: #Host nativeType: @AjTalk.Hosting.RemotingHostServer
!

host := Host new: @AjTalk.Machine !!current with: 20000 with: 'Server2000'
!

